Univers Mac Interactif 42/Univers Mac Interactif - Issue 42.iso/>interactif/Démos Voyager/AHDN.DIR/00029_Script_MovieScript

Text File | 1994-10-31 | 576b | 34 lines

on startMovie
end

on silenceMe
  set the sound of cast 3 to 0
  set the sound of cast 11 to 0
  set the sound of cast 18 to 0
  set the sound of cast 22 to 0
  set the sound of cast 28 to 0
end

on enterframe
  cursor 200
end

on waitQT chan
  if the movieRate of sprite chan = 1 then go to the frame
end

on waitSnd chan
  if  soundbusy(chan) = 1 then go to the frame
end

on timing theTicks
  repeat while (theTicks >= the timer)
    go the frame
  end repeat
end

on keyDown
  global autoplaying
  put 0 into autoplaying
  go frame 65
end